home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Gigarom 1
/
Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso
/
FILES
/
HYP
/
J-M
/
MH Power Scripts v1.3.cpt
/
MH Power Scripts v1.3
/
card_6494.txt
< prev
next >
Wrap
Text File
|
1989-02-26
|
4KB
|
188 lines
-- card: 6494 from stack: in.3
-- bmap block id: 7764
-- flags: 0000
-- background id: 6157
-- name:
-- part 6 (button)
-- low flags: 00
-- high flags: 0001
-- rect: left=8 top=27 right=299 bottom=505
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=7 top=27 right=299 bottom=504
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New Button
-- part 1 (field)
-- low flags: 00
-- high flags: 4002
-- rect: left=162 top=41 right=138 bottom=468
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: item1
-- part 2 (field)
-- low flags: 00
-- high flags: 4002
-- rect: left=12 top=181 right=198 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: item2
-- part 3 (field)
-- low flags: 00
-- high flags: 4002
-- rect: left=14 top=227 right=292 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: item3
-- part 4 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=184 top=308 right=336 bottom=329
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Print Registration
----- HyperTalk script -----
on mouseUp
put card field "Item1" into item1
put card field "Item2" into item2
put card field "Item3" into item3
if item1 is empty or item2 is empty or item3 is empty then
beep
answer "Please answer all of the information first!"
exit mouseUp
end if
set lockscreen to true
go to card two of background "Reg Print"
put PersonalAddress into card field "Reg"
put item1 & Return & Return & item2 & Return & Return & item3 into card field "Items"
set lockscreen to true
go to card 1 of background "Reg Print"
end mouseUp
-- part 7 (field)
-- low flags: 01
-- high flags: 0001
-- rect: left=5 top=41 right=138 bottom=161
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 3
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: item1
-- part 8 (field)
-- low flags: 01
-- high flags: 0001
-- rect: left=12 top=164 right=181 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: item2
-- part 9 (field)
-- low flags: 01
-- high flags: 0001
-- rect: left=12 top=209 right=226 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: item2
-- part 10 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=47 top=6 right=41 bottom=482
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 24
-- style flags: 1792
-- line height: 32
-- part name:
-- part contents for card part 7
----- text -----
Name
Company
Address
City, State, Zip
Phone Number
Program Version #
-- part contents for card part 9
----- text -----
Where did you hear about this product / Comments?
-- part contents for card part 10
----- text -----
Registration
-- part contents for card part 8
----- text -----
Registration Number on the diskette / Received from?